﻿' LibWowArmory
' by Ronald M. Clifford (roncli@roncli.com)
'
' This source code is released under the GNU Library General Public License (LGPL) Version 2.1.

Imports Newtonsoft.Json
Imports System.Collections.Generic

Namespace roncliProductions.LibWowArmory.CalendarDetailSchema

    Public Class calendarDetail

        Private strSummary As String
        Private strCalendarType As String
        Private lngStart As Long
        Private strType As String
        Private strOwner As String
        Private iInvites As New List(Of invite)
        Private intID As Integer
        Private blnLocked As Boolean
        Private lngTZ As Long
        Private strIcon As String
        Private strDescription As String
        Private strLocation As String
        Private blnModerator As Boolean

        <JsonProperty("summary")> Public Property summary() As String
            Get
                Return strSummary
            End Get
            Set(ByVal value As String)
                strSummary = value
            End Set
        End Property

        <JsonProperty("calendarType")> Public Property calendarType() As String
            Get
                Return strCalendarType
            End Get
            Set(ByVal value As String)
                strCalendarType = value
            End Set
        End Property

        <JsonProperty("start")> Public Property start() As Long
            Get
                Return lngStart
            End Get
            Set(ByVal value As Long)
                lngStart = value
            End Set
        End Property

        <JsonProperty("type")> Public Property type() As String
            Get
                Return strType
            End Get
            Set(ByVal value As String)
                strType = value
            End Set
        End Property

        <JsonProperty("owner")> Public Property owner() As String
            Get
                Return strOwner
            End Get
            Set(ByVal value As String)
                strOwner = value
            End Set
        End Property

        <JsonProperty("invites")> Public Property invites() As List(Of invite)
            Get
                Return iInvites
            End Get
            Set(ByVal value As List(Of invite))
                iInvites = value
            End Set
        End Property

        <JsonProperty("id")> Public Property id() As Integer
            Get
                Return intID
            End Get
            Set(ByVal value As Integer)
                intID = value
            End Set
        End Property

        <JsonProperty("locked")> Public Property locked() As Boolean
            Get
                Return blnLocked
            End Get
            Set(ByVal value As Boolean)
                blnLocked = value
            End Set
        End Property

        <JsonProperty("tz")> Public Property tz() As Long
            Get
                Return lngTZ
            End Get
            Set(ByVal value As Long)
                lngTZ = value
            End Set
        End Property

        <JsonProperty("icon")> Public Property icon() As String
            Get
                Return strIcon
            End Get
            Set(ByVal value As String)
                strIcon = value
            End Set
        End Property

        <JsonProperty("description")> Public Property description() As String
            Get
                Return strDescription
            End Get
            Set(ByVal value As String)
                strDescription = value
            End Set
        End Property

        <JsonProperty("location")> Public Property location() As String
            Get
                Return strLocation
            End Get
            Set(ByVal value As String)
                strLocation = value
            End Set
        End Property

        <JsonProperty("moderator")> Public Property moderator() As Boolean
            Get
                Return blnModerator
            End Get
            Set(ByVal value As Boolean)
                blnModerator = value
            End Set
        End Property

    End Class

End Namespace